/ Chip 2000 January / Chip_2000-01_cd.bin / zkuste / MacOS / STUFF / LINESH.SIT / LineShareDemo / LineShare Scripts / Generic Fax 1_ARA

< prev

next >

view JSON data

view as text

open on a Mac

open on a PC

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 12 47 65 6e 65 72 69 | 63 20 20 46 61 78 20 31 |..Generi|c  Fax 1|
|00000010| 5f 41 52 41 00 00 00 00 | 00 00 00 00 00 00 00 00 |_ARA....|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 73 4c 69 | 4e 01 00 00 00 00 00 00 |.TEXTsLi|N.......|
|00000050| 00 00 00 00 00 1b a9 00 | 00 01 c4 b2 a5 f4 4b b2 |........|......K.|
|00000060| a5 f4 4b 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..K.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 84 ae 00 00 |........|........|
|00000080| 21 20 56 65 72 73 69 6f | 6e 20 33 2e 34 2e 32 0d |! Versio|n 3.4.2.|
|00000090| 21 0d 21 24 20 52 65 71 | 75 69 72 65 73 3a 20 43 |!.!$ Req|uires: C|
|000000a0| 6c 61 73 73 20 31 20 66 | 61 78 20 6d 6f 64 65 6d |lass 1 f|ax modem|
|000000b0| 20 68 61 72 64 77 61 72 | 65 20 68 61 6e 64 73 68 | hardwar|e handsh|
|000000c0| 61 6b 69 6e 67 20 63 61 | 62 6c 65 2e 0d 21 0d 21 |aking ca|ble..!.!|
|000000d0| 24 20 53 75 70 70 6f 72 | 74 73 3a 20 66 61 78 20 |$ Suppor|ts: fax |
|000000e0| 61 6e 64 20 41 52 41 20 | 73 6f 66 74 77 61 72 65 |and ARA |software|
|000000f0| 20 69 6e 20 74 68 65 20 | 73 65 72 76 65 72 20 6d | in the |server m|
|00000100| 6f 64 65 2e 0d 21 0d 21 | 24 20 46 61 78 20 52 65 |ode..!.!|$ Fax Re|
|00000110| 63 65 69 76 69 6e 67 3a | 20 69 66 20 41 64 61 70 |ceiving:| if Adap|
|00000120| 74 69 76 65 20 41 6e 73 | 77 65 72 69 6e 67 20 69 |tive Ans|wering i|
|00000130| 73 20 69 6d 70 6c 65 6d | 65 6e 74 65 64 0d 21 0d |s implem|ented.!.|
|00000140| 21 24 20 55 73 65 3a 20 | 20 20 43 6c 61 73 73 20 |!$ Use: |  Class |
|00000150| 31 20 66 6f 72 20 46 61 | 78 2c 20 41 52 41 2f 4c |1 for Fa|x, ARA/L|
|00000160| 69 6e 65 53 68 61 72 65 | 20 66 6f 72 20 41 52 41 |ineShare| for ARA|
|00000170| 2e 0d 21 0d 21 24 20 52 | 65 61 64 3a 20 20 79 6f |..!.!$ R|ead:  yo|
|00000180| 75 72 20 6d 6f 64 65 6d | 20 6d 61 6e 75 61 6c 20 |ur modem| manual |
|00000190| 74 6f 20 6d 6f 64 69 66 | 79 20 74 68 65 20 22 41 |to modif|y the "A|
|000001a0| 54 22 20 73 74 72 69 6e | 67 73 2e 0d 21 0d 21 24 |T" strin|gs..!.!$|
|000001b0| 20 53 65 65 3a 20 20 20 | 74 68 65 20 47 65 6e 65 | See:   |the Gene|
|000001c0| 72 69 63 20 53 63 72 69 | 70 74 73 20 47 75 69 64 |ric Scri|pts Guid|
|000001d0| 65 20 66 6f 72 20 64 65 | 74 61 69 6c 73 2e 0d 21 |e for de|tails..!|
|000001e0| 0d 5e 32 20 53 70 65 61 | 6b 65 72 20 4f 6e 3a 20 |.^2 Spea|ker On: |
|000001f0| 20 20 20 20 20 20 20 3d | 20 45 6e 75 6d 28 22 4e |       =| Enum("N|
|00000200| 65 76 65 72 22 20 3d 20 | 22 30 22 2c 22 44 75 72 |ever" = |"0","Dur|
|00000210| 69 6e 67 20 43 6f 6e 6e | 65 63 74 22 20 3d 20 22 |ing Conn|ect" = "|
|00000220| 31 22 2c 20 22 41 6c 77 | 61 79 73 22 3d 22 32 22 |1", "Alw|ays"="2"|
|00000230| 29 20 22 31 22 0d 5e 33 | 20 53 70 65 61 6b 65 72 |) "1".^3| Speaker|
|00000240| 20 56 6f 6c 75 6d 65 3a | 20 09 20 20 3d 20 45 6e | Volume:| .  = En|
|00000250| 75 6d 28 22 4c 6f 77 22 | 3d 22 31 22 2c 22 4d 65 |um("Low"|="1","Me|
|00000260| 64 69 75 6d 22 3d 22 32 | 22 2c 22 48 69 67 68 22 |dium"="2|","High"|
|00000270| 3d 22 33 22 29 20 22 32 | 22 0d 5e 34 20 41 6e 73 |="3") "2|".^4 Ans|
|00000280| 77 65 72 20 4f 6e 3a 20 | 20 20 20 20 20 20 20 20 |wer On: |        |
|00000290| 3d 20 45 6e 75 6d 28 22 | 31 20 52 69 6e 67 22 3d |= Enum("|1 Ring"=|
|000002a0| 22 31 22 2c 22 32 20 52 | 69 6e 67 73 22 3d 22 32 |"1","2 R|ings"="2|
|000002b0| 22 2c 22 33 20 52 69 6e | 67 73 22 3d 22 33 22 2c |","3 Rin|gs"="3",|
|000002c0| 22 35 20 52 69 6e 67 73 | 22 3d 22 35 22 2c 22 37 |"5 Rings|"="5","7|
|000002d0| 20 52 69 6e 67 73 22 3d | 22 37 22 29 20 22 32 22 | Rings"=|"7") "2"|
|000002e0| 0d 5e 35 20 41 64 61 70 | 74 69 76 65 20 41 6e 73 |.^5 Adap|tive Ans|
|000002f0| 77 65 72 69 6e 67 3a 20 | 20 3d 20 54 65 78 74 20 |wering: | = Text |
|00000300| 22 22 0d 5e 36 20 41 54 | 20 66 6f 72 20 4e 6f 72 |"".^6 AT| for Nor|
|00000310| 6d 61 6c 20 6d 6f 64 65 | 3a 20 20 3d 20 54 65 78 |mal mode|:  = Tex|
|00000320| 74 20 22 22 0d 5e 37 20 | 41 54 20 66 6f 72 20 48 |t "".^7 |AT for H|
|00000330| 57 20 48 61 6e 64 73 68 | 61 6b 65 3a 20 3d 20 54 |W Handsh|ake: = T|
|00000340| 65 78 74 20 22 22 0d 5e | 38 20 41 54 20 66 6f 72 |ext "".^|8 AT for|
|00000350| 20 53 57 20 48 61 6e 64 | 73 68 61 6b 65 3a 20 3d | SW Hand|shake: =|
|00000360| 20 54 65 78 74 20 22 22 | 0d 5e 39 20 44 61 74 61 | Text ""|.^9 Data|
|00000370| 20 50 6f 72 74 20 53 70 | 65 65 64 3a 20 3d 20 45 | Port Sp|eed: = E|
|00000380| 6e 75 6d 28 22 39 36 30 | 30 22 2c 22 31 39 32 30 |num("960|0","1920|
|00000390| 30 22 2c 22 33 38 34 30 | 30 22 2c 22 35 37 36 30 |0","3840|0","5760|
|000003a0| 30 22 2c 22 31 31 35 32 | 30 30 22 29 20 22 33 38 |0","1152|00") "38|
|000003b0| 34 30 30 22 0d 21 20 2d | 2d 2d 2d 2d 2d 2d 2d 2d |400".! -|--------|
|000003c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003e0| 2d 0d 21 20 52 65 73 65 | 74 74 69 6e 67 20 74 68 |-.! Rese|tting th|
|000003f0| 65 20 6d 6f 64 65 6d 3a | 0d 21 20 2d 2d 2d 2d 2d |e modem:|.! -----|
|00000400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000420| 2d 2d 2d 2d 2d 0d 40 48 | 61 6e 67 75 70 0d 20 20 |-----.@H|angup.  |
|00000430| 53 65 74 54 72 69 65 73 | 20 32 0d 20 20 46 6c 75 |SetTries| 2.  Flu|
|00000440| 73 68 0d 20 20 48 73 52 | 65 73 65 74 20 30 2c 30 |sh.  HsR|eset 0,0|
|00000450| 2c 31 37 2c 31 39 2c 30 | 2c 30 0d 21 0d 21 20 54 |,17,19,0|,0.!.! T|
|00000460| 72 79 20 74 6f 20 63 61 | 74 63 68 20 74 68 65 20 |ry to ca|tch the |
|00000470| 22 4f 4b 22 20 61 6e 73 | 77 65 72 2c 20 75 73 65 |"OK" ans|wer, use|
|00000480| 20 74 68 65 20 45 73 63 | 61 70 65 20 73 65 71 20 | the Esc|ape seq |
|00000490| 61 6e 64 20 44 54 52 20 | 74 72 61 6e 73 69 74 69 |and DTR |transiti|
|000004a0| 6f 6e 73 0d 21 20 74 6f | 20 65 6e 74 65 72 20 74 |ons.! to| enter t|
|000004b0| 68 65 20 63 6f 6d 6d 61 | 6e 64 20 6d 6f 64 65 0d |he comma|nd mode.|
|000004c0| 21 0d 40 4c 61 62 65 6c | 20 31 0d 20 20 6d 61 74 |!.@Label| 1.  mat|
|000004d0| 63 68 63 6c 72 0d 20 20 | 6d 61 74 63 68 73 74 72 |chclr.  |matchstr|
|000004e0| 20 31 20 32 20 22 4f 4b | 5c 72 5c 6e 22 0d 20 20 | 1 2 "OK|\r\n".  |
|000004f0| 77 72 69 74 65 20 22 41 | 54 48 30 26 46 56 31 5c |write "A|TH0&FV1\|
|00000500| 72 22 0d 20 20 6d 61 74 | 63 68 72 65 61 64 20 32 |r".  mat|chread 2|
|00000510| 30 0d 20 20 43 68 72 44 | 65 6c 61 79 20 31 0d 20 |0.  ChrD|elay 1. |
|00000520| 20 57 72 69 74 65 20 22 | 2b 2b 2b 22 0d 20 20 43 | Write "|+++".  C|
|00000530| 68 72 44 65 6c 61 79 20 | 30 0d 20 20 44 74 72 43 |hrDelay |0.  DtrC|
|00000540| 6c 65 61 72 0d 20 20 4c | 42 72 65 61 6b 0d 20 20 |lear.  L|Break.  |
|00000550| 44 74 72 53 65 74 0d 21 | 0d 20 20 44 65 63 54 72 |DtrSet.!|.  DecTr|
|00000560| 69 65 73 0d 20 20 49 66 | 54 72 69 65 73 20 30 20 |ies.  If|Tries 0 |
|00000570| 31 0d 21 0d 21 20 4f 53 | 45 72 72 20 2d 36 30 31 |1.!.! OS|Err -601|
|00000580| 39 20 22 4d 6f 64 65 6d | 20 65 72 72 6f 72 20 2d |9 "Modem| error -|
|00000590| 20 74 68 65 20 6d 6f 64 | 65 6d 20 69 73 20 6e 6f | the mod|em is no|
|000005a0| 74 20 72 65 73 70 6f 6e | 64 69 6e 67 22 0d 21 0d |t respon|ding".!.|
|000005b0| 20 20 65 78 69 74 20 2d | 36 30 31 39 0d 40 4c 61 |  exit -|6019.@La|
|000005c0| 62 65 6c 20 32 0d 20 20 | 77 72 69 74 65 20 22 41 |bel 2.  |write "A|
|000005d0| 54 2b 46 43 4c 41 53 53 | 3d 30 5c 72 22 0d 20 20 |T+FCLASS|=0\r".  |
|000005e0| 4a 73 72 20 31 30 30 0d | 20 20 69 66 53 74 72 20 |Jsr 100.|  ifStr |
|000005f0| 35 20 33 20 22 22 0d 20 | 20 77 72 69 74 65 20 22 |5 3 "". | write "|
|00000600| 41 54 5e 35 5c 34 38 5c | 72 22 0d 20 20 4a 73 72 |AT^5\48\|r".  Jsr|
|00000610| 20 31 30 30 0d 40 4c 61 | 62 65 6c 20 33 0d 20 20 | 100.@La|bel 3.  |
|00000620| 65 78 69 74 20 30 0d 21 | 0d 21 20 2d 2d 2d 2d 2d |exit 0.!|.! -----|
|00000630| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000640| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000650| 2d 2d 2d 2d 2d 0d 21 20 | 20 20 20 52 65 63 65 69 |-----.! |   Recei|
|00000660| 76 69 6e 67 20 69 6e 63 | 6f 6d 69 6e 67 20 63 61 |ving inc|oming ca|
|00000670| 6c 6c 73 0d 21 20 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |lls.! --|--------|
|00000680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000690| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000006a0| 0d 40 41 4e 53 57 45 52 | 0d 20 20 53 65 74 56 61 |.@ANSWER|.  SetVa|
|000006b0| 72 20 41 20 22 22 0d 20 | 20 49 66 53 74 72 20 41 |r A "". | IfStr A|
|000006c0| 20 35 30 20 22 5e 36 5e | 37 5e 38 22 0d 21 0d 21 | 50 "^6^|7^8".!.!|
|000006d0| 20 53 65 74 20 74 68 65 | 20 6d 6f 64 65 6d 20 70 | Set the| modem p|
|000006e0| 72 65 66 65 72 72 65 64 | 20 73 70 65 65 64 20 66 |referred| speed f|
|000006f0| 69 72 73 74 0d 21 0d 20 | 20 53 65 72 52 65 73 65 |irst.!. | SerRese|
|00000700| 74 20 56 61 6c 28 22 5e | 39 22 29 2c 30 2c 38 2c |t Val("^|9"),0,8,|
|00000710| 31 0d 20 20 4a 73 72 20 | 38 30 0d 21 0d 40 4c 61 |1.  Jsr |80.!.@La|
|00000720| 62 65 6c 20 31 30 0d 21 | 0d 21 20 53 65 74 20 74 |bel 10.!|.! Set t|
|00000730| 68 65 20 63 6f 6d 6d 6f | 6e 20 6f 70 74 69 6f 6e |he commo|n option|
|00000740| 73 0d 20 20 4a 73 72 20 | 37 30 0d 21 0d 21 20 53 |s.  Jsr |70.!.! S|
|00000750| 65 74 20 74 68 65 20 63 | 6f 6d 6d 75 6e 69 63 61 |et the c|ommunica|
|00000760| 74 69 6f 6e 20 6f 70 74 | 69 6f 6e 73 3a 0d 21 20 |tion opt|ions:.! |
|00000770| a5 20 4e 6f 72 6d 61 6c | 20 63 6f 6e 6e 65 63 74 |. Normal| connect|
|00000780| 69 6f 6e 2c 20 72 65 70 | 6f 72 74 20 63 6f 6e 6e |ion, rep|ort conn|
|00000790| 65 63 74 69 6f 6e 20 73 | 70 65 65 64 20 28 66 6f |ection s|peed (fo|
|000007a0| 72 20 41 52 41 29 0d 21 | 20 a5 20 48 57 20 66 6c |r ARA).!| . HW fl|
|000007b0| 6f 77 20 63 6f 6e 74 72 | 6f 6c 20 20 20 28 66 6f |ow contr|ol   (fo|
|000007c0| 72 20 41 52 41 2c 20 46 | 61 78 20 73 68 6f 75 6c |r ARA, F|ax shoul|
|000007d0| 64 20 6e 6f 74 20 75 73 | 65 20 61 20 68 61 6e 64 |d not us|e a hand|
|000007e0| 73 68 61 6b 65 20 6f 6e | 20 72 65 63 65 69 76 69 |shake on| receivi|
|000007f0| 6e 67 29 0d 21 0d 20 20 | 57 72 69 74 65 20 22 41 |ng).!.  |Write "A|
|00000800| 54 5e 37 5e 36 5c 72 22 | 0d 20 20 4a 73 72 20 31 |T^7^6\r"|.  Jsr 1|
|00000810| 30 30 0d 21 0d 21 20 53 | 65 74 20 46 61 78 20 6d |00.!.! S|et Fax m|
|00000820| 6f 64 65 20 26 20 61 64 | 61 70 74 69 76 65 20 61 |ode & ad|aptive a|
|00000830| 6e 73 77 65 72 69 6e 67 | 20 28 69 66 20 6e 65 63 |nswering| (if nec|
|00000840| 65 73 73 61 72 79 29 0d | 21 0d 20 20 69 66 53 74 |essary).|!.  ifSt|
|00000850| 72 20 35 20 31 35 20 22 | 22 0d 21 0d 20 20 57 72 |r 5 15 "|".!.  Wr|
|00000860| 69 74 65 20 22 41 54 2b | 46 43 4c 41 53 53 3d 31 |ite "AT+|FCLASS=1|
|00000870| 5c 72 22 0d 20 20 4a 73 | 72 20 31 30 30 0d 20 20 |\r".  Js|r 100.  |
|00000880| 57 72 69 74 65 20 22 41 | 54 5e 35 5c 34 39 5c 72 |Write "A|T^5\49\r|
|00000890| 22 0d 20 20 4a 73 72 20 | 31 30 30 0d 20 20 57 72 |".  Jsr |100.  Wr|
|000008a0| 69 74 65 20 22 41 54 2b | 46 43 4c 41 53 53 3d 30 |ite "AT+|FCLASS=0|
|000008b0| 5c 72 22 0d 20 20 4a 73 | 72 20 31 30 30 0d 21 0d |\r".  Js|r 100.!.|
|000008c0| 21 20 46 65 74 63 68 20 | 74 68 65 20 74 75 62 65 |! Fetch |the tube|
|000008d0| 20 61 66 74 65 72 20 5e | 34 20 72 69 6e 67 73 0d | after ^|4 rings.|
|000008e0| 21 20 53 77 69 74 63 68 | 20 74 6f 20 6e 75 6d 65 |! Switch| to nume|
|000008f0| 72 69 63 20 61 6e 73 77 | 65 72 73 20 28 66 6f 72 |ric answ|ers (for|
|00000900| 20 66 61 78 20 73 6f 66 | 74 77 61 72 65 29 0d 21 | fax sof|tware).!|
|00000910| 0d 20 20 57 72 69 74 65 | 20 22 41 54 53 30 3d 5e |.  Write| "ATS0=^|
|00000920| 34 56 30 5c 72 22 0d 20 | 20 4a 73 72 20 31 31 30 |4V0\r". | Jsr 110|
|00000930| 0d 21 0d 21 20 45 76 65 | 72 79 74 68 69 6e 67 20 |.!.! Eve|rything |
|00000940| 69 73 20 72 65 61 64 79 | 20 2d 20 6c 65 74 27 73 |is ready| - let's|
|00000950| 20 73 69 74 20 61 6e 64 | 20 77 61 69 74 20 66 6f | sit and| wait fo|
|00000960| 72 20 61 20 63 61 6c 6c | 0d 21 20 57 65 27 6c 6c |r a call|.! We'll|
|00000970| 20 77 61 69 74 20 66 6f | 72 20 32 20 6d 69 6e 75 | wait fo|r 2 minu|
|00000980| 74 65 73 2c 20 74 68 65 | 6e 20 72 65 69 6e 69 74 |tes, the|n reinit|
|00000990| 69 61 74 65 20 74 68 65 | 20 6d 6f 64 65 6d 0d 21 |iate the| modem.!|
|000009a0| 0d 20 20 4e 6f 74 65 20 | 22 57 61 69 74 69 6e 67 |.  Note |"Waiting|
|000009b0| 20 66 6f 72 20 61 20 66 | 61 78 20 6f 72 20 41 52 | for a f|ax or AR|
|000009c0| 41 20 63 61 6c 6c c9 22 | 0d 20 20 4d 61 74 63 68 |A call."|.  Match|
|000009d0| 43 6c 72 0d 20 20 4d 61 | 74 63 68 53 74 72 20 30 |Clr.  Ma|tchStr 0|
|000009e0| 32 20 34 30 20 22 34 37 | 5c 72 22 0d 20 20 4d 61 |2 40 "47|\r".  Ma|
|000009f0| 74 63 68 53 74 72 20 30 | 33 20 34 30 20 22 31 30 |tchStr 0|3 40 "10|
|00000a00| 5c 72 22 0d 20 20 4d 61 | 74 63 68 53 74 72 20 30 |\r".  Ma|tchStr 0|
|00000a10| 34 20 34 31 20 22 34 38 | 5c 72 22 0d 20 20 4d 61 |4 41 "48|\r".  Ma|
|00000a20| 74 63 68 53 74 72 20 30 | 35 20 34 31 20 22 31 31 |tchStr 0|5 41 "11|
|00000a30| 5c 72 22 0d 20 20 4d 61 | 74 63 68 53 74 72 20 30 |\r".  Ma|tchStr 0|
|00000a40| 36 20 34 32 20 22 34 39 | 5c 72 22 0d 20 20 4d 61 |6 42 "49|\r".  Ma|
|00000a50| 74 63 68 53 74 72 20 30 | 37 20 34 33 20 22 35 30 |tchStr 0|7 43 "50|
|00000a60| 5c 72 22 0d 20 20 4d 61 | 74 63 68 53 74 72 20 30 |\r".  Ma|tchStr 0|
|00000a70| 38 20 34 33 20 22 31 32 | 5c 72 22 0d 20 20 4d 61 |8 43 "12|\r".  Ma|
|00000a80| 74 63 68 53 74 72 20 30 | 39 20 34 34 20 22 35 31 |tchStr 0|9 44 "51|
|00000a90| 5c 72 22 0d 20 20 4d 61 | 74 63 68 53 74 72 20 31 |\r".  Ma|tchStr 1|
|00000aa0| 30 20 34 34 20 22 31 33 | 5c 72 22 0d 20 20 4d 61 |0 44 "13|\r".  Ma|
|00000ab0| 74 63 68 53 74 72 20 31 | 31 20 34 35 20 22 35 32 |tchStr 1|1 45 "52|
|00000ac0| 5c 72 22 0d 20 20 4d 61 | 74 63 68 53 74 72 20 31 |\r".  Ma|tchStr 1|
|00000ad0| 35 20 33 31 20 22 33 33 | 5c 72 22 0d 20 20 4d 61 |5 31 "33|\r".  Ma|
|00000ae0| 74 63 68 53 74 72 20 31 | 36 20 31 33 20 22 32 5c |tchStr 1|6 13 "2\|
|00000af0| 72 22 0d 20 20 4d 61 74 | 63 68 53 74 72 20 31 37 |r".  Mat|chStr 17|
|00000b00| 20 33 30 20 22 31 5c 72 | 22 0d 20 20 4d 61 74 63 | 30 "1\r|".  Matc|
|00000b10| 68 53 74 72 20 31 38 20 | 31 32 20 22 33 5c 72 22 |hStr 18 |12 "3\r"|
|00000b20| 0d 20 20 4d 61 74 63 68 | 53 74 72 20 31 39 20 31 |.  Match|Str 19 1|
|00000b30| 32 20 22 38 5c 72 22 0d | 20 20 4d 61 74 63 68 53 |2 "8\r".|  MatchS|
|00000b40| 74 72 20 32 30 20 31 32 | 20 22 37 5c 72 22 0d 40 |tr 20 12| "7\r".@|
|00000b50| 4c 61 62 65 6c 20 31 31 | 0d 20 20 4d 61 74 63 68 |Label 11|.  Match|
|00000b60| 72 65 61 64 20 31 32 30 | 30 0d 40 4c 61 62 65 6c |read 120|0.@Label|
|00000b70| 20 31 32 0d 20 20 4e 6f | 74 65 20 22 54 75 6e 69 | 12.  No|te "Tuni|
|00000b80| 6e 67 20 61 67 61 69 6e | c9 22 0d 20 20 57 72 69 |ng again|.".  Wri|
|00000b90| 74 65 20 22 41 54 56 31 | 22 0d 20 20 4a 73 72 20 |te "ATV1|".  Jsr |
|00000ba0| 31 30 30 0d 20 20 4a 75 | 6d 70 20 31 30 0d 40 4c |100.  Ju|mp 10.@L|
|00000bb0| 61 62 65 6c 20 31 33 0d | 20 20 4e 6f 74 65 20 22 |abel 13.|  Note "|
|00000bc0| 52 69 6e 67 c9 22 0d 20 | 20 4a 75 6d 70 20 31 31 |Ring.". | Jump 11|
|00000bd0| 0d 21 0d 21 0d 21 20 4e | 6f 20 61 64 61 70 74 69 |.!.!.! N|o adapti|
|00000be0| 76 65 20 61 6e 73 77 65 | 72 69 6e 67 20 2d 3e 20 |ve answe|ring -> |
|00000bf0| 77 6f 72 6b 20 69 6e 20 | 76 65 72 62 61 6c 20 6d |work in |verbal m|
|00000c00| 6f 64 65 20 28 6d 6f 72 | 65 20 72 65 6c 69 61 62 |ode (mor|e reliab|
|00000c10| 6c 65 29 0d 21 0d 40 4c | 61 62 65 6c 20 31 35 0d |le).!.@L|abel 15.|
|00000c20| 20 20 57 72 69 74 65 20 | 22 41 54 53 30 3d 5e 34 |  Write |"ATS0=^4|
|00000c30| 5c 72 22 0d 20 20 4a 73 | 72 20 31 30 30 0d 21 0d |\r".  Js|r 100.!.|
|00000c40| 20 20 4e 6f 74 65 20 22 | 57 61 69 74 69 6e 67 20 |  Note "|Waiting |
|00000c50| 66 6f 72 20 61 6e 20 41 | 52 41 20 63 61 6c 6c c9 |for an A|RA call.|
|00000c60| 22 0d 20 20 4d 61 74 63 | 68 53 74 72 20 31 20 32 |".  Matc|hStr 1 2|
|00000c70| 30 20 22 5c 72 5c 6e 43 | 41 52 52 49 45 52 20 22 |0 "\r\nC|ARRIER "|
|00000c80| 0d 20 20 4d 61 74 63 68 | 53 74 72 20 32 20 32 30 |.  Match|Str 2 20|
|00000c90| 20 22 5c 72 5c 6e 43 4f | 4e 4e 45 43 54 20 22 0d | "\r\nCO|NNECT ".|
|00000ca0| 20 20 4d 61 74 63 68 53 | 74 72 20 33 20 31 37 20 |  MatchS|tr 3 17 |
|00000cb0| 22 5c 72 5c 6e 52 49 4e | 47 5c 72 5c 6e 22 0d 20 |"\r\nRIN|G\r\n". |
|00000cc0| 20 4d 61 74 63 68 53 74 | 72 20 34 20 31 30 20 22 | MatchSt|r 4 10 "|
|00000cd0| 5c 72 5c 6e 4e 4f 20 22 | 0d 40 4c 61 62 65 6c 20 |\r\nNO "|.@Label |
|00000ce0| 31 36 0d 20 20 4d 61 74 | 63 68 72 65 61 64 20 31 |16.  Mat|chread 1|
|00000cf0| 32 30 30 0d 20 20 6a 75 | 6d 70 20 31 30 0d 40 4c |200.  ju|mp 10.@L|
|00000d00| 61 62 65 6c 20 31 37 0d | 20 20 4e 6f 74 65 20 22 |abel 17.|  Note "|
|00000d10| 52 69 6e 67 c9 22 0d 20 | 20 6a 75 6d 70 20 31 36 |Ring.". | jump 16|
|00000d20| 0d 21 0d 21 20 44 61 74 | 61 20 63 6f 6e 6e 65 63 |.!.! Dat|a connec|
|00000d30| 74 69 6f 6e 20 68 61 73 | 20 62 65 65 6e 20 65 73 |tion has| been es|
|00000d40| 74 61 62 6c 69 73 68 65 | 64 20 28 77 65 20 72 65 |tablishe|d (we re|
|00000d50| 61 64 20 22 43 41 52 52 | 49 45 52 22 29 0d 21 20 |ad "CARR|IER").! |
|00000d60| 50 75 74 20 74 68 65 20 | 22 43 4f 4e 4e 45 43 54 |Put the |"CONNECT|
|00000d70| 22 20 62 61 63 6b 20 74 | 6f 20 74 68 65 20 62 75 |" back t|o the bu|
|00000d80| 66 66 65 72 20 61 6e 64 | 20 61 74 74 61 63 68 20 |ffer and| attach |
|00000d90| 74 68 65 20 22 44 61 74 | 61 22 20 73 75 62 50 6f |the "Dat|a" subPo|
|00000da0| 72 74 0d 21 20 69 66 20 | 69 74 20 77 61 73 20 61 |rt.! if |it was a|
|00000db0| 6e 20 69 6e 63 6f 6d 69 | 6e 67 20 63 61 6c 6c 2c |n incomi|ng call,|
|00000dc0| 20 70 75 74 20 74 68 65 | 20 22 52 49 4e 47 22 20 | put the| "RING" |
|00000dd0| 62 65 66 6f 72 65 20 74 | 68 65 20 22 43 4f 4e 4e |before t|he "CONN|
|00000de0| 45 43 54 22 0d 21 0d 40 | 4c 61 62 65 6c 20 32 30 |ECT".!.@|Label 20|
|00000df0| 0d 20 20 51 75 65 75 65 | 49 6e 70 75 74 20 22 5c |.  Queue|Input "\|
|00000e00| 72 5c 6e 43 41 52 52 49 | 45 52 20 22 0d 20 20 69 |r\nCARRI|ER ".  i|
|00000e10| 66 4f 72 69 67 69 6e 61 | 74 65 20 32 31 0d 20 20 |fOrigina|te 21.  |
|00000e20| 51 75 65 75 65 49 6e 70 | 75 74 20 22 5c 72 5c 6e |QueueInp|ut "\r\n|
|00000e30| 52 49 4e 47 5c 72 5c 6e | 22 0d 40 4c 61 62 65 6c |RING\r\n|".@Label|
|00000e40| 20 32 31 0d 20 20 41 74 | 74 61 63 68 20 22 41 52 | 21.  At|tach "AR|
|00000e50| 41 22 20 28 44 54 52 2c | 45 73 63 61 70 65 2c 54 |A" (DTR,|Escape,T|
|00000e60| 69 6d 65 4c 69 6d 69 74 | 3d 30 29 0d 21 0d 21 20 |imeLimit|=0).!.! |
|00000e70| 46 61 78 20 63 6f 6e 6e | 65 63 74 69 6f 6e 20 68 |Fax conn|ection h|
|00000e80| 61 73 20 62 65 65 6e 20 | 65 73 74 61 62 6c 69 73 |as been |establis|
|00000e90| 68 65 64 20 28 77 65 20 | 72 65 61 64 20 22 46 41 |hed (we |read "FA|
|00000ea0| 58 22 29 0d 21 20 50 75 | 74 20 74 68 65 20 2b 46 |X").! Pu|t the +F|
|00000eb0| 43 4f 4e 20 62 61 63 6b | 20 74 6f 20 74 68 65 20 |CON back| to the |
|00000ec0| 62 75 66 66 65 72 2c 0d | 21 20 69 66 20 69 74 20 |buffer,.|! if it |
|00000ed0| 77 61 73 20 61 6e 20 69 | 6e 63 6f 6d 69 6e 67 20 |was an i|ncoming |
|00000ee0| 63 61 6c 6c 2c 20 70 75 | 74 20 74 68 65 20 22 52 |call, pu|t the "R|
|00000ef0| 49 4e 47 22 20 62 65 66 | 6f 72 65 20 74 68 65 20 |ING" bef|ore the |
|00000f00| 22 2b 46 43 4f 4e 22 0d | 21 20 41 74 74 61 63 68 |"+FCON".|! Attach|
|00000f10| 20 74 68 65 20 22 46 61 | 78 22 20 73 75 62 50 6f | the "Fa|x" subPo|
|00000f20| 72 74 0d 21 0d 40 4c 61 | 62 65 6c 20 33 30 0d 20 |rt.!.@La|bel 30. |
|00000f30| 20 51 75 65 75 65 49 6e | 70 75 74 20 22 31 5c 72 | QueueIn|put "1\r|
|00000f40| 22 0d 20 20 69 66 4f 72 | 69 67 69 6e 61 74 65 20 |".  ifOr|iginate |
|00000f50| 33 32 0d 40 4c 61 62 65 | 6c 20 33 31 0d 20 20 51 |32.@Labe|l 31.  Q|
|00000f60| 75 65 75 65 49 6e 70 75 | 74 20 22 32 5c 72 32 5c |ueueInpu|t "2\r2\|
|00000f70| 72 22 0d 40 4c 61 62 65 | 6c 20 33 32 0d 20 20 41 |r".@Labe|l 32.  A|
|00000f80| 74 74 61 63 68 20 22 46 | 61 78 22 20 28 52 65 73 |ttach "F|ax" (Res|
|00000f90| 65 74 28 32 34 30 30 29 | 2c 49 64 6c 65 4c 69 6d |et(2400)|,IdleLim|
|00000fa0| 69 74 3d 33 30 29 0d 21 | 0d 21 0d 21 20 43 6f 6e |it=30).!|.!.! Con|
|00000fb0| 76 65 72 74 69 6e 67 20 | 6e 75 6d 65 72 69 63 20 |verting |numeric |
|00000fc0| 72 65 73 70 6f 6e 73 65 | 73 20 69 6e 74 6f 20 74 |response|s into t|
|00000fd0| 68 65 20 76 65 72 62 61 | 6c 0d 21 0d 40 4c 61 62 |he verba|l.!.@Lab|
|00000fe0| 65 6c 20 34 30 0d 20 20 | 51 75 65 75 65 49 6e 70 |el 40.  |QueueInp|
|00000ff0| 75 74 20 22 32 34 30 30 | 5c 72 5c 6e 22 0d 20 20 |ut "2400|\r\n".  |
|00001000| 4a 75 6d 70 20 32 30 0d | 40 4c 61 62 65 6c 20 34 |Jump 20.|@Label 4|
|00001010| 31 0d 20 20 51 75 65 75 | 65 49 6e 70 75 74 20 22 |1.  Queu|eInput "|
|00001020| 34 38 30 30 5c 72 5c 6e | 22 0d 20 20 4a 75 6d 70 |4800\r\n|".  Jump|
|00001030| 20 32 30 0d 40 4c 61 62 | 65 6c 20 34 32 0d 20 20 | 20.@Lab|el 42.  |
|00001040| 51 75 65 75 65 49 6e 70 | 75 74 20 22 37 32 30 30 |QueueInp|ut "7200|
|00001050| 5c 72 5c 6e 22 0d 20 20 | 4a 75 6d 70 20 32 30 0d |\r\n".  |Jump 20.|
|00001060| 40 4c 61 62 65 6c 20 34 | 33 0d 20 20 51 75 65 75 |@Label 4|3.  Queu|
|00001070| 65 49 6e 70 75 74 20 22 | 39 36 30 30 5c 72 5c 6e |eInput "|9600\r\n|
|00001080| 22 0d 20 20 4a 75 6d 70 | 20 32 30 0d 40 4c 61 62 |".  Jump| 20.@Lab|
|00001090| 65 6c 20 34 34 0d 20 20 | 51 75 65 75 65 49 6e 70 |el 44.  |QueueInp|
|000010a0| 75 74 20 22 31 32 30 30 | 30 5c 72 5c 6e 22 0d 20 |ut "1200|0\r\n". |
|000010b0| 20 4a 75 6d 70 20 32 30 | 0d 40 4c 61 62 65 6c 20 | Jump 20|.@Label |
|000010c0| 34 35 0d 20 20 51 75 65 | 75 65 49 6e 70 75 74 20 |45.  Que|ueInput |
|000010d0| 22 31 34 34 30 30 5c 72 | 5c 6e 22 0d 20 20 4a 75 |"14400\r|\n".  Ju|
|000010e0| 6d 70 20 32 30 0d 0d 40 | 4c 61 62 65 6c 20 35 30 |mp 20..@|Label 50|
|000010f0| 0d 20 20 4e 6f 74 65 20 | 22 53 75 73 70 65 6e 64 |.  Note |"Suspend|
|00001100| 65 64 22 0d 20 20 53 61 | 79 20 22 50 72 65 73 73 |ed".  Sa|y "Press|
|00001110| 20 74 68 65 20 4f 70 74 | 69 6f 6e 73 c9 20 62 75 | the Opt|ions. bu|
|00001120| 74 74 6f 6e 20 74 6f 20 | 65 6e 74 65 72 20 74 68 |tton to |enter th|
|00001130| 65 20 41 54 2d 73 74 72 | 69 6e 67 73 20 66 6f 72 |e AT-str|ings for|
|00001140| 20 79 6f 75 72 20 6d 6f | 64 65 6d 21 22 0d 20 20 | your mo|dem!".  |
|00001150| 50 61 75 73 65 20 31 32 | 30 30 0d 20 20 4a 75 6d |Pause 12|00.  Jum|
|00001160| 70 20 35 30 0d 21 0d 21 | 20 2d 2d 2d 2d 2d 2d 2d |p 50.!.!| -------|
|00001170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001190| 2d 2d 2d 0d 21 20 4f 72 | 69 67 69 6e 61 74 69 6e |---.! Or|iginatin|
|000011a0| 67 20 61 20 63 61 6c 6c | 20 74 68 72 6f 75 67 68 |g a call| through|
|000011b0| 20 74 68 65 20 22 41 52 | 41 22 20 73 75 62 70 6f | the "AR|A" subpo|
|000011c0| 72 74 0d 21 20 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |rt.! ---|--------|
|000011d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|000011f0| 40 4f 52 49 47 49 4e 41 | 54 45 20 22 41 52 41 22 |@ORIGINA|TE "ARA"|
|00001200| 20 28 22 5c 72 5c 6e 4c | 69 6e 65 53 68 61 72 65 | ("\r\nL|ineShare|
|00001210| 20 4c 69 6e 65 20 69 73 | 20 42 75 73 79 5c 72 5c | Line is| Busy\r\|
|00001220| 6e 42 55 53 59 5c 72 5c | 6e 22 29 0d 20 20 53 65 |nBUSY\r\|n").  Se|
|00001230| 72 52 65 73 65 74 20 56 | 61 6c 28 22 5e 39 22 29 |rReset V|al("^9")|
|00001240| 2c 30 2c 38 2c 31 0d 20 | 20 4a 73 72 20 38 30 0d |,0,8,1. | Jsr 80.|
|00001250| 21 0d 21 20 53 65 74 20 | 74 68 65 20 63 6f 6d 6d |!.! Set |the comm|
|00001260| 6f 6e 20 6f 70 74 69 6f | 6e 73 0d 21 0d 20 20 4a |on optio|ns.!.  J|
|00001270| 73 72 20 37 30 0d 21 0d | 21 20 53 65 74 20 74 68 |sr 70.!.|! Set th|
|00001280| 65 20 44 61 74 61 20 6d | 6f 64 65 3a 0d 21 20 a5 |e Data m|ode:.! .|
|00001290| 20 4e 6f 72 6d 61 6c 20 | 63 6f 6e 6e 65 63 74 69 | Normal |connecti|
|000012a0| 6f 6e 2c 20 72 65 70 6f | 72 74 20 63 6f 6e 6e 65 |on, repo|rt conne|
|000012b0| 63 74 69 6f 6e 20 73 70 | 65 65 64 0d 21 20 a5 20 |ction sp|eed.! . |
|000012c0| 48 57 20 48 61 6e 64 73 | 68 61 6b 65 0d 21 0d 20 |HW Hands|hake.!. |
|000012d0| 20 57 72 69 74 65 20 22 | 41 54 5e 36 5e 37 5c 72 | Write "|AT^6^7\r|
|000012e0| 22 0d 20 20 4a 73 72 20 | 31 30 30 0d 21 0d 21 20 |".  Jsr |100.!.! |
|000012f0| 50 72 65 70 61 72 65 20 | 74 6f 20 72 65 63 65 69 |Prepare |to recei|
|00001300| 76 65 20 61 6c 6c 20 65 | 72 72 6f 72 20 72 65 73 |ve all e|rror res|
|00001310| 75 6c 74 20 63 6f 64 65 | 73 2c 20 64 69 61 6c 20 |ult code|s, dial |
|00001320| 74 68 65 20 6e 75 6d 62 | 65 72 0d 21 0d 20 20 4a |the numb|er.!.  J|
|00001330| 73 72 20 39 30 0d 20 20 | 4d 61 74 63 68 53 74 72 |sr 90.  |MatchStr|
|00001340| 20 31 20 32 30 20 22 5c | 72 5c 6e 43 41 52 52 49 | 1 20 "\|r\nCARRI|
|00001350| 45 52 20 22 0d 20 20 4d | 61 74 63 68 53 74 72 20 |ER ".  M|atchStr |
|00001360| 32 20 32 30 20 22 5c 72 | 5c 6e 43 4f 4e 4e 45 43 |2 20 "\r|\nCONNEC|
|00001370| 54 20 22 0d 20 20 4d 61 | 74 63 68 52 65 61 64 20 |T ".  Ma|tchRead |
|00001380| 31 30 30 30 0d 20 20 57 | 72 69 74 65 20 22 5c 72 |1000.  W|rite "\r|
|00001390| 22 0d 20 20 45 78 69 74 | 20 2d 36 30 31 39 0d 21 |".  Exit| -6019.!|
|000013a0| 0d 21 20 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.! -----|--------|
|000013b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 21 20 |--------|-----.! |
|000013d0| 4f 72 69 67 69 6e 61 74 | 69 6e 67 20 61 20 63 61 |Originat|ing a ca|
|000013e0| 6c 6c 20 74 68 72 6f 75 | 67 68 20 74 68 65 20 22 |ll throu|gh the "|
|000013f0| 46 61 78 22 20 73 75 62 | 50 6f 72 74 0d 21 20 2d |Fax" sub|Port.! -|
|00001400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 40 4f 52 49 47 49 |--------|-.@ORIGI|
|00001430| 4e 41 54 45 20 22 46 61 | 78 22 20 28 22 5c 72 5c |NATE "Fa|x" ("\r\|
|00001440| 6e 4c 69 6e 65 53 68 61 | 72 65 20 4c 69 6e 65 20 |nLineSha|re Line |
|00001450| 69 73 20 42 75 73 79 5c | 72 5c 6e 42 55 53 59 5c |is Busy\|r\nBUSY\|
|00001460| 72 5c 6e 22 29 0d 21 0d | 21 20 53 65 74 20 74 68 |r\n").!.|! Set th|
|00001470| 65 20 22 46 61 78 22 20 | 73 70 65 65 64 0d 21 0d |e "Fax" |speed.!.|
|00001480| 20 20 53 65 72 52 65 73 | 65 74 20 31 39 32 30 30 |  SerRes|et 19200|
|00001490| 2c 30 2c 38 2c 31 0d 20 | 20 4a 73 72 20 38 30 0d |,0,8,1. | Jsr 80.|
|000014a0| 21 0d 21 20 53 65 74 20 | 74 68 65 20 63 6f 6d 6d |!.! Set |the comm|
|000014b0| 6f 6e 20 6f 70 74 69 6f | 6e 73 0d 21 0d 20 20 4a |on optio|ns.!.  J|
|000014c0| 73 72 20 37 30 0d 21 0d | 21 20 53 65 74 20 74 68 |sr 70.!.|! Set th|
|000014d0| 65 20 46 61 78 20 6d 6f | 64 65 20 28 58 6f 6e 2f |e Fax mo|de (Xon/|
|000014e0| 58 6f 66 66 29 0d 20 20 | 57 72 69 74 65 20 22 41 |Xoff).  |Write "A|
|000014f0| 54 26 53 30 5e 38 2b 46 | 43 4c 41 53 53 3d 31 5c |T&S0^8+F|CLASS=1\|
|00001500| 72 22 0d 20 20 4a 73 72 | 20 31 30 30 0d 21 0d 21 |r".  Jsr| 100.!.!|
|00001510| 20 4e 6f 77 20 65 6d 69 | 74 20 61 6c 6c 20 63 6f | Now emi|t all co|
|00001520| 6d 6d 61 6e 64 73 20 74 | 68 61 74 20 74 68 65 20 |mmands t|hat the |
|00001530| 61 70 70 6c 69 63 61 74 | 69 6f 6e 20 68 61 73 20 |applicat|ion has |
|00001540| 73 65 6e 74 20 74 6f 20 | 74 68 61 74 20 70 6f 72 |sent to |that por|
|00001550| 74 2c 0d 21 20 65 78 63 | 65 70 74 20 22 46 43 4c |t,.! exc|ept "FCL|
|00001560| 41 53 53 22 2c 20 65 74 | 63 0d 21 0d 20 20 45 6d |ASS", et|c.!.  Em|
|00001570| 69 74 43 6c 65 61 72 20 | 22 46 43 4c 41 53 53 22 |itClear |"FCLASS"|
|00001580| 2c 22 56 22 2c 22 58 22 | 2c 22 45 22 0d 20 20 4a |,"V","X"|,"E".  J|
|00001590| 73 72 20 36 30 0d 20 20 | 57 72 69 74 65 20 22 41 |sr 60.  |Write "A|
|000015a0| 54 56 30 5c 72 22 0d 20 | 20 4a 73 72 20 31 31 30 |TV0\r". | Jsr 110|
|000015b0| 0d 21 0d 21 20 50 72 65 | 70 61 72 65 20 74 6f 20 |.!.! Pre|pare to |
|000015c0| 72 65 63 65 69 76 65 20 | 61 6c 6c 20 65 72 72 6f |receive |all erro|
|000015d0| 72 20 72 65 73 75 6c 74 | 20 63 6f 64 65 73 2c 20 |r result| codes, |
|000015e0| 64 69 61 6c 20 74 68 65 | 20 6e 75 6d 62 65 72 0d |dial the| number.|
|000015f0| 21 0d 20 20 4d 61 74 63 | 68 43 6c 72 0d 20 20 4d |!.  Matc|hClr.  M|
|00001600| 61 74 63 68 53 74 72 20 | 30 31 20 33 30 20 22 31 |atchStr |01 30 "1|
|00001610| 5c 72 22 0d 20 20 4d 61 | 74 63 68 53 74 72 20 31 |\r".  Ma|tchStr 1|
|00001620| 33 20 39 33 20 22 33 5c | 72 22 0d 20 20 4d 61 74 |3 93 "3\|r".  Mat|
|00001630| 63 68 53 74 72 20 31 34 | 20 39 34 20 22 38 5c 72 |chStr 14| 94 "8\r|
|00001640| 22 0d 20 20 4d 61 74 63 | 68 53 74 72 20 31 35 20 |".  Matc|hStr 15 |
|00001650| 39 32 20 22 37 5c 72 22 | 0d 20 20 57 72 69 74 65 |92 "7\r"|.  Write|
|00001660| 20 22 41 54 44 5e 31 5c | 72 22 0d 20 20 48 73 52 | "ATD^1\|r".  HsR|
|00001670| 65 73 65 74 20 2a 0d 20 | 20 4d 61 74 63 68 52 65 |eset *. | MatchRe|
|00001680| 61 64 20 31 30 30 30 0d | 20 20 57 72 69 74 65 20 |ad 1000.|  Write |
|00001690| 22 5c 72 22 0d 20 20 45 | 78 69 74 20 2d 36 30 31 |"\r".  E|xit -601|
|000016a0| 39 0d 21 0d 21 20 54 68 | 69 73 20 73 65 63 74 69 |9.!.! Th|is secti|
|000016b0| 6f 6e 20 65 6d 69 74 73 | 20 61 6c 6c 20 6d 6f 64 |on emits| all mod|
|000016c0| 65 6d 20 63 6f 6d 6d 61 | 6e 64 73 20 73 65 6e 74 |em comma|nds sent|
|000016d0| 20 66 72 6f 6d 20 74 68 | 65 20 63 6c 69 65 6e 74 | from th|e client|
|000016e0| 20 61 70 70 6c 69 63 61 | 74 69 6f 6e 0d 21 20 46 | applica|tion.! F|
|000016f0| 6f 72 20 65 61 63 68 20 | 73 65 74 20 6f 66 20 63 |or each |set of c|
|00001700| 6f 6d 6d 61 6e 64 73 20 | 74 68 65 20 22 4f 4b 22 |ommands |the "OK"|
|00001710| 20 61 6e 73 77 65 72 20 | 69 73 20 61 77 61 69 74 | answer |is await|
|00001720| 65 64 0d 21 0d 40 4c 61 | 62 65 6c 20 36 30 0d 20 |ed.!.@La|bel 60. |
|00001730| 20 45 6d 69 74 53 74 61 | 72 74 0d 40 4c 61 62 65 | EmitSta|rt.@Labe|
|00001740| 6c 20 36 31 0d 20 20 45 | 6d 69 74 43 6f 6d 6d 61 |l 61.  E|mitComma|
|00001750| 6e 64 20 36 32 0d 20 20 | 4a 73 72 20 31 30 30 0d |nd 62.  |Jsr 100.|
|00001760| 20 20 4a 75 6d 70 20 36 | 31 0d 40 4c 61 62 65 6c |  Jump 6|1.@Label|
|00001770| 20 36 32 0d 20 20 72 65 | 74 75 72 6e 0d 21 0d 21 | 62.  re|turn.!.!|
|00001780| 20 54 68 69 73 20 73 65 | 63 74 69 6f 6e 20 69 6e | This se|ction in|
|00001790| 69 74 69 61 74 65 73 20 | 74 68 65 20 6d 6f 64 65 |itiates |the mode|
|000017a0| 6d 20 62 65 66 6f 72 65 | 20 41 4e 53 57 45 52 20 |m before| ANSWER |
|000017b0| 61 6e 64 20 4f 52 49 47 | 49 4e 41 54 45 73 3a 0d |and ORIG|INATEs:.|
|000017c0| 21 20 65 78 74 65 6e 64 | 65 64 20 72 65 73 70 6f |! extend|ed respo|
|000017d0| 6e 73 65 73 20 2b 20 63 | 6f 6e 6e 65 63 74 20 61 |nses + c|onnect a|
|000017e0| 74 20 74 68 65 20 68 69 | 67 68 65 73 74 20 72 61 |t the hi|ghest ra|
|000017f0| 74 65 20 2b 20 73 70 65 | 61 6b 65 72 20 63 6f 6e |te + spe|aker con|
|00001800| 74 72 6f 6c 20 2b 0d 21 | 20 72 65 73 65 74 20 6f |trol +.!| reset o|
|00001810| 6e 20 44 74 72 20 64 72 | 6f 70 20 2b 20 44 43 44 |n Dtr dr|op + DCD|
|00001820| 20 76 61 6c 69 64 0d 21 | 20 56 65 72 62 61 6c 20 | valid.!| Verbal |
|00001830| 72 65 73 70 6f 6e 73 65 | 73 20 6d 6f 64 65 2c 20 |response|s mode, |
|00001840| 6e 6f 20 65 63 68 6f 20 | 0d 21 0d 40 4c 61 62 65 |no echo |.!.@Labe|
|00001850| 6c 20 37 30 0d 20 20 57 | 72 69 74 65 20 22 41 54 |l 70.  W|rite "AT|
|00001860| 58 34 4d 5e 32 4c 5e 33 | 26 44 32 26 43 31 56 31 |X4M^2L^3|&D2&C1V1|
|00001870| 45 30 5c 72 22 0d 20 20 | 4a 73 72 20 31 30 30 0d |E0\r".  |Jsr 100.|
|00001880| 20 20 72 65 74 75 72 6e | 20 0d 21 0d 21 0d 21 20 |  return| .!.!.! |
|00001890| 54 68 69 73 20 73 65 63 | 74 69 6f 6e 20 73 79 6e |This sec|tion syn|
|000018a0| 63 72 6f 6e 69 7a 65 20 | 74 68 65 20 6d 6f 64 65 |cronize |the mode|
|000018b0| 6d 20 61 66 74 65 72 20 | 74 68 65 20 73 65 72 69 |m after |the seri|
|000018c0| 61 6c 20 70 6f 72 74 20 | 73 70 65 65 64 20 73 77 |al port |speed sw|
|000018d0| 69 74 63 68 69 6e 67 0d | 21 0d 40 4c 61 62 65 6c |itching.|!.@Label|
|000018e0| 20 38 30 0d 20 20 43 68 | 72 44 65 6c 61 79 20 31 | 80.  Ch|rDelay 1|
|000018f0| 0d 20 20 57 72 69 74 65 | 20 22 41 54 5c 72 22 0d |.  Write| "AT\r".|
|00001900| 20 20 43 68 72 44 65 6c | 61 79 20 30 0d 20 20 4a |  ChrDel|ay 0.  J|
|00001910| 73 72 20 31 30 30 0d 20 | 20 72 65 74 75 72 6e 0d |sr 100. | return.|
|00001920| 21 0d 21 20 50 72 65 70 | 61 72 65 20 74 6f 20 72 |!.! Prep|are to r|
|00001930| 65 63 65 69 76 65 20 65 | 72 72 6f 72 20 72 65 73 |eceive e|rror res|
|00001940| 75 6c 74 20 63 6f 64 65 | 73 2c 20 73 65 6e 64 20 |ult code|s, send |
|00001950| 74 68 65 20 64 69 61 6c | 69 6e 67 20 63 6f 6d 6d |the dial|ing comm|
|00001960| 61 6e 64 20 61 6e 64 0d | 21 20 73 65 74 20 74 68 |and and.|! set th|
|00001970| 65 20 75 73 65 72 27 73 | 20 68 61 6e 64 73 68 61 |e user's| handsha|
|00001980| 6b 65 20 6d 6f 64 65 0d | 21 0d 40 4c 61 62 65 6c |ke mode.|!.@Label|
|00001990| 20 39 30 0d 20 20 4d 61 | 74 63 68 43 6c 72 0d 20 | 90.  Ma|tchClr. |
|000019a0| 20 4d 61 74 63 68 53 74 | 72 20 32 20 39 31 20 22 | MatchSt|r 2 91 "|
|000019b0| 4e 4f 20 44 49 41 4c 54 | 4f 4e 45 5c 72 5c 6e 22 |NO DIALT|ONE\r\n"|
|000019c0| 0d 20 20 4d 61 74 63 68 | 53 74 72 20 33 20 39 32 |.  Match|Str 3 92|
|000019d0| 20 22 42 55 53 59 5c 72 | 5c 6e 22 0d 20 20 4d 61 | "BUSY\r|\n".  Ma|
|000019e0| 74 63 68 53 74 72 20 34 | 20 39 33 20 22 4e 4f 20 |tchStr 4| 93 "NO |
|000019f0| 43 41 52 52 49 45 52 5c | 72 5c 6e 22 0d 20 20 4d |CARRIER\|r\n".  M|
|00001a00| 61 74 63 68 53 74 72 20 | 35 20 39 34 20 22 4e 4f |atchStr |5 94 "NO|
|00001a10| 20 41 4e 53 57 45 52 5c | 72 5c 6e 22 0d 20 20 57 | ANSWER\|r\n".  W|
|00001a20| 72 69 74 65 20 22 41 54 | 44 5e 31 5c 72 22 0d 20 |rite "AT|D^1\r". |
|00001a30| 20 48 73 52 65 73 65 74 | 20 2a 0d 20 20 72 65 74 | HsReset| *.  ret|
|00001a40| 75 72 6e 0d 40 4c 61 62 | 65 6c 20 39 31 0d 20 20 |urn.@Lab|el 91.  |
|00001a50| 65 78 69 74 20 2d 36 30 | 32 30 0d 40 4c 61 62 65 |exit -60|20.@Labe|
|00001a60| 6c 20 39 32 0d 20 20 65 | 78 69 74 20 2d 36 30 32 |l 92.  e|xit -602|
|00001a70| 32 0d 40 4c 61 62 65 6c | 20 39 33 0d 20 20 65 78 |2.@Label| 93.  ex|
|00001a80| 69 74 20 2d 36 30 32 31 | 0d 40 4c 61 62 65 6c 20 |it -6021|.@Label |
|00001a90| 39 34 0d 20 20 65 78 69 | 74 20 2d 36 30 32 33 0d |94.  exi|t -6023.|
|00001aa0| 21 0d 21 20 50 72 6f 63 | 65 73 73 69 6e 67 20 74 |!.! Proc|essing t|
|00001ab0| 68 65 20 41 54 20 63 6f | 6d 6d 61 6e 64 3a 0d 21 |he AT co|mmand:.!|
|00001ac0| 20 4f 4b 20 2d 3e 20 70 | 72 6f 63 65 65 64 0d 21 | OK -> p|roceed.!|
|00001ad0| 20 45 52 52 4f 52 20 6f | 72 20 54 69 6d 65 4f 75 | ERROR o|r TimeOu|
|00001ae0| 74 20 2d 3e 65 78 69 74 | 20 2d 36 30 31 39 0d 21 |t ->exit| -6019.!|
|00001af0| 20 49 74 20 63 61 6e 20 | 62 65 20 63 61 6c 6c 65 | It can |be calle|
|00001b00| 64 20 41 46 54 45 52 20 | 74 68 65 20 22 57 72 69 |d AFTER |the "Wri|
|00001b10| 74 65 22 20 63 6f 6d 6d | 61 6e 64 2c 20 73 69 6e |te" comm|and, sin|
|00001b20| 63 65 20 4c 69 6e 65 53 | 68 61 72 65 20 62 75 66 |ce LineS|hare buf|
|00001b30| 66 65 72 73 20 69 6e 70 | 75 74 0d 21 0d 40 4c 61 |fers inp|ut.!.@La|
|00001b40| 62 65 6c 20 31 30 30 0d | 20 20 4d 61 74 63 68 43 |bel 100.|  MatchC|
|00001b50| 6c 72 0d 20 20 4d 61 74 | 63 68 53 74 72 20 31 20 |lr.  Mat|chStr 1 |
|00001b60| 31 30 33 20 22 5c 72 5c | 6e 4f 4b 5c 72 5c 6e 22 |103 "\r\|nOK\r\n"|
|00001b70| 0d 20 20 4d 61 74 63 68 | 53 74 72 20 32 20 31 30 |.  Match|Str 2 10|
|00001b80| 32 20 22 5c 72 5c 6e 45 | 52 52 4f 52 5c 72 5c 6e |2 "\r\nE|RROR\r\n|
|00001b90| 22 0d 40 4c 61 62 65 6c | 20 31 30 31 0d 20 20 4d |".@Label| 101.  M|
|00001ba0| 61 74 63 68 52 65 61 64 | 20 32 30 0d 40 4c 61 62 |atchRead| 20.@Lab|
|00001bb0| 65 6c 20 31 30 32 0d 20 | 20 45 78 69 74 20 2d 36 |el 102. | Exit -6|
|00001bc0| 30 31 39 0d 40 4c 61 62 | 65 6c 20 31 30 33 0d 20 |019.@Lab|el 103. |
|00001bd0| 20 72 65 74 75 72 6e 0d | 21 0d 40 4c 61 62 65 6c | return.|!.@Label|
|00001be0| 20 31 31 30 0d 20 20 4d | 61 74 63 68 43 6c 72 0d | 110.  M|atchClr.|
|00001bf0| 20 20 4d 61 74 63 68 53 | 74 72 20 31 20 31 30 33 |  MatchS|tr 1 103|
|00001c00| 20 22 30 5c 72 22 0d 20 | 20 4d 61 74 63 68 53 74 | "0\r". | MatchSt|
|00001c10| 72 20 32 20 31 30 32 20 | 22 34 5c 72 22 0d 20 20 |r 2 102 |"4\r".  |
|00001c20| 4a 75 6d 70 20 31 30 31 | 0d 00 00 00 00 00 00 00 |Jump 101|........|
|00001c30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c80| 00 00 01 00 00 00 01 72 | 00 00 00 72 00 00 00 52 |.......r|...r...R|
|00001c90| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ca0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cb0| 0e 4c 69 62 20 49 6d 70 | 6f 72 74 20 50 50 43 72 |.Lib Imp|ort PPCr|
|00001cc0| 02 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cf0| 00 00 b0 3f 4f 5a 00 00 | 07 96 00 00 09 1a 00 00 |...?OZ..|........|
|00001d00| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d30| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d80| 00 00 00 32 03 42 20 00 | 00 00 05 33 2e 34 2e 32 |...2.B .|...3.4.2|
|00001d90| 25 33 2e 34 2e 32 0d a9 | 31 39 39 33 2d 39 38 20 |%3.4.2..|1993-98 |
|00001da0| 53 74 61 6c 6b 65 72 20 | 53 6f 66 74 77 61 72 65 |Stalker |Software|
|00001db0| 2c 20 49 6e 63 2e 00 00 | 00 20 03 42 80 00 00 00 |, Inc...|. .B....|
|00001dc0| 05 33 2e 34 2e 32 13 4c | 69 6e 65 53 68 61 72 65 |.3.4.2.L|ineShare|
|00001dd0| aa 20 73 6f 66 74 77 61 | 72 65 00 00 00 14 00 00 |. softwa|re......|
|00001de0| 00 00 00 00 00 00 6d 61 | 63 73 c4 4c 69 4e 00 00 |......ma|cs.LiN..|
|00001df0| 00 00 00 00 01 00 00 00 | 01 72 00 00 00 72 00 00 |........|.r...r..|
|00001e00| 00 52 01 b0 2d 88 32 ae | 00 00 00 1c 00 52 00 01 |.R..-.2.|.....R..|
|00001e10| 76 65 72 73 00 01 00 12 | 72 6f 75 74 00 00 00 2a |vers....|rout...*|
|00001e20| 00 01 ff ff 00 00 00 00 | 00 00 00 00 00 02 ff ff |........|........|
|00001e30| 00 00 00 36 00 00 00 00 | 00 00 ff ff 00 00 00 5a |...6....|.......Z|
|00001e40| 01 b0 45 d4 00 00 00 00 | 00 00 00 00 00 00 00 00 |..E.....|........|
|00001e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+